inherited ListeDesEtudiantsMDIChild: TListeDesEtudiantsMDIChild
  AlignWithMargins = True
  Anchors = [akLeft, akTop, akRight]
  Caption = 'Liste des '#233'tudiants'
  ClientHeight = 500
  ClientWidth = 746
  Visible = False
  ExplicitWidth = 754
  ExplicitHeight = 534
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter
    Left = 186
    Top = 0
    Height = 500
    ExplicitLeft = 352
    ExplicitTop = 144
    ExplicitHeight = 100
  end
  object ueEnseigneeGroupBox: TGroupBox
    Left = 0
    Top = 0
    Width = 186
    Height = 500
    Align = alLeft
    Caption = 'Liste des UE enseign'#233'e :'
    TabOrder = 0
    object ueDBLookupListBox: TDBLookupListBox
      Left = 2
      Top = 15
      Width = 182
      Height = 472
      Align = alClient
      KeyField = 'nomUE'
      ListSource = DataSource2
      TabOrder = 0
      OnClick = selectUEActionExecute
      OnEnter = selectUEActionExecute
    end
  end
  object listeEtuDBGrid: TDBGrid
    Left = 189
    Top = 0
    Width = 557
    Height = 500
    Align = alClient
    DataSource = DataSource1
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
    Columns = <
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'nomUE'
        Width = 50
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'numEtu'
        Width = 100
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'nomEtu'
        Width = 100
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'prenomEtu'
        Width = 100
        Visible = True
      end>
  end
  object ADOTable1: TADOTable
    Active = True
    Connection = MainForm.Connection
    CursorType = ctStatic
    Filter = 'nomUE = IHM'
    TableName = 'Cours'
    Left = 320
    Top = 248
  end
  object listeUEQuery: TADOQuery
    Active = True
    Connection = MainForm.Connection
    CursorType = ctStatic
    Filtered = True
    Parameters = <>
    SQL.Strings = (
      'SELECT nomUE,numEtu,nomEtu,prenomEtu FROM Cours,etu'
      ';'
      ''
      '')
    Left = 352
    Top = 248
  end
  object DataSource1: TDataSource
    DataSet = listeUEQuery
    Left = 384
    Top = 248
  end
  object DataSource2: TDataSource
    DataSet = ADOTable1
    Left = 416
    Top = 248
  end
  object ActionList1: TActionList
    Left = 696
    Top = 8
    object selectUEAction: TAction
      Caption = 'Selection'
      OnExecute = selectUEActionExecute
    end
  end
end
